Plot[((80+1)!/18!/62!) (1 - r)^18 r^62, {r,0, 1}, {y, 0,10}]